* Firms and Trade Policy Lobbying in the European Union *

use "Data_EUTrade.dta", clear 

drop if firm==.
drop if ISIC_code==100
gen Trade_size = log(EXGRGrossexports + IMGRGrossimports) 

********************** Table 1 **********************************

sum firm MNCs_Trade Orbis_MNCs Intermediate_consumption IIT Differentiation Services LME Share_VA Trade_size Orbis_Conc TTIPBrexit Commissioner

********************** Table 2 **********************************

probit firm MNCs_Trade Intermediate_consumption IIT Services LME, robust
estat clas

probit firm Orbis_MNCs Intermediate_consumption IIT Services LME i.year, robust
estat clas

probit firm MNCs_Trade Intermediate_consumption IIT Services LME Orbis_Conc Share_VA Trade_size TTIPBrexit Commissioner  i.year, robust
estat clas

probit firm MNCs_Trade Intermediate_consumption Differentiation Services LME Orbis_Conc Share_VA Trade_size TTIPBrexit Commissioner  i.year, robust
estat clas

********************** Figures 1-3 **********************************

margins, dydx(MNCs_Trade)
margins , at(MNCs_Trade = (0 5 10 15 20 25 30 35 40 45 50 55 60 65 70 75 80 85 90 95 100)) post coeflegend atmeans level(97.5)
marginsplot, xdimension(at(MNCs_Trade))

probit firm MNCs_Trade Intermediate_consumption Differentiation Services LME Orbis_Conc Share_VA Trade_size TTIPBrexit Commissioner  i.year, robust
margins , at(Intermediate_consumption = (0 5 10 15 20 25 30 35 40 45 50 55 60 65 70 75 80 85 90 95 100)) post coeflegend atmeans level(97.5)
marginsplot, xdimension(at(Intermediate_consumption))

probit firm MNCs_Trade Intermediate_consumption Differentiation Services LME Orbis_Conc Share_VA Trade_size TTIPBrexit Commissioner  i.year, robust
margins , at(Differentiation = (0 0.05 0.1 0.15 0.2 0.25 0.3 0.35 0.4 0.45 0.5 0.55 0.6 0.65 0.7 0.75 0.8 0.85 0.9 0.95 1)) post coeflegend atmeans level(97.5)
marginsplot, xdimension(at(Differentiation))

********************** Table A2  **********************************

logit firm MNCs_Trade Intermediate_consumption IIT Services LME, robust
estat clas

logit firm Orbis_MNCs Intermediate_consumption IIT Services LME i.year, robust
estat clas

logit firm MNCs_Trade Intermediate_consumption IIT Services LME Orbis_Conc Share_VA Trade_size TTIPBrexit Commissioner  i.year, robust
estat clas

logit firm MNCs_Trade Intermediate_consumption Differentiation Services LME Orbis_Conc Share_VA Trade_size TTIPBrexit Commissioner  i.year, robust
estat clas

********************** Table A3 **********************************

probit firm MNCs_Trade Intermediate_consumption IIT Services LME, vce(cl ID)
estat clas
probit firm Orbis_MNCs Intermediate_consumption IIT Services LME i.year, vce(cl ID)
estat clas
probit firm MNCs_Trade Intermediate_consumption IIT Services LME Orbis_Conc Share_VA Trade_size TTIPBrexit Commissioner  i.year, vce(cl ID)
estat clas
probit firm MNCs_Trade Intermediate_consumption Differentiation Services LME Orbis_Conc Share_VA Trade_size TTIPBrexit Commissioner  i.year, vce(cl ID)
estat clas

********************** Footnote 7 **********************************

drop if EU==0
probit firm MNCs_Trade Intermediate_consumption Differentiation Services LME Orbis_Conc Share_VA Trade_size TTIPBrexit Commissioner  i.year, robust
estat clas